EEEEEEEEEEEEEEE MMM MMM =UUU UUU LLL AAAAAAAAA TTTTTTTTITTTTTITT 
EEEEEEEEEEEEEEE MMM MMM = UUU UUU LLL AAAAAAAAA TTTTTTTTTTTTIITT 
EEEEEEEEEEEEEEE MMM MMM = =UUU UUU LLL ARAAARABDA TTTTTTTTTITTTITT 
EEE MMMMMM = =OMMMMMM =(UUU YUU LLL AAA AAA TTT 
EEE MAMMMM = =6MMMMM = =6UUU UUU LLL AAA AAA TTT 
EEE MAMMMM =6MMMMMM =6UUU UUU LLL AAA ABA TTT 
EEE MAM 6 OMA OM UUU LLL AAA Aan TTT 
EEE MAM OMA OMMM (UU UUU LLL AAA TTT 
EEE MAM 6 6OMMM OMMM (UU UUU LLL AAA AMA TTT 
EEEEEEEEEEEE MMM MMM = =UUU YUU LLL ABA hae TTT 
EEEEEEEEEEEE MMM MMM UUU LLL AAA AAA TTT 
EEEEEEEEEEEE MMM MMM = UUU UUU LLL TTT 
EEE MMM MAM = UUU UUU LLL AAAAAAAAAAAAAAA TTT 
EEE MMM MMM = =UUU UUU LLL AAAA TTT 
EEE MMM MMM = UUU UUU LLL ADAAAAAAAAAAAAA TTT 
EEE MMM MMM UUU LLL AA TTT 
EEE MMM MMM = UUU UUU LLL AAA ABA TTT 
EEE MMM MMM = UUU UUU LLL AAA AAA TTT 
EEEEEEEEEEEEEEE MMM MMM UUUUUUUUUUUUUUU  LLLLLLLLLLLLLLL AAA AAA TTT 
EEEEEEEEEEEEEEE MMM MMM UUUUUUUUUUUUUUU LLLLLLLLLLLLLLL AAA AAA TTT 
EEEEEEEEEEEEEEE MMM MMM = UUUUUUUUUUUUUUU  LLLLLLLLLLLLLLL AAA ABR TTT 


-———— 


| a 
| **F 1LE®*1D**VAXLOAD 
w VV AAAAAA XK XX LL 000000 AAAAAA —DDDDDDDD 
w VV AAAAAA XX XX LL 000000 AAAAAA —  DDDDDDDD 
VV VV AA AA XX XX LL 00 00 AA AA 0D DD 
VV VV AA AA XX MX LL 00 OO AA AA 0D DD 
vw VV AA AA XX XK LL 00 00 AA AA DD DD 
VV VV AA AA XX XX LL 00 OO AA AA 0D DD 
Ww VV AA AA XX LL 00 00 AA AA DD DD 
D> BD 
Ww VV AAAAAAAAAA XX XX LL 00 00 AAAAAAAAAA DD DD 
VV VV AA AA XX XX LL 00 OO AA AA DD DD eves 
VV VV AA AA XX XX LL 00 OO AA AA DD DD coos 
Ww AA AA XX XX LLLLLLLLLL 000000 AA AA DDDDDDDD snes 
VV AA AA XX XX LLLLLLLLLL 000000 AA AA DDDDDDDD eeee 
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tebe 
be 
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vv VV AA AA XX LL 00 OO AA AA 
VV VV AAAAAAAAAA XX XxX LL 00 00 AAAAAAAAAA 
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- HEADER FOR LOADABLE CHAR/DECIMAL EMULATION 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY RDANCE WITH THE TERMS OF SUCH aintt AND WITH THE 


OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 
TRANSFERRED. 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
eepokaTi on NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR _ RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


tA RRRASAASASALASAAAAALAASESASASASALE LEAR RRRRR RAR ARERR RR SRSA RA RAR SRA RASS DS | 


; Facility: 


Instruction Emulator 


; Abstract: 


This module defines the data structures required for a piece 

of loadable code. This includes the pool header and the code. 
needed to hook into the rest of the system. for the instruction 
emulation code, the hooks are vectors in the SCB. 


; Environment: MODE=Kernel 
; Author: Kathleen D. Morse, Creation date: 04-May-1983 
; Modified by: 


v03-004 LJK0028 Lawrence J. Kenah 10-Apr-1984 
Store base address of emulator image in cell in SYS.EXE 
set aside for that purpose. 


v03-003 LJK0027 Lawrence J. Kenah 21-Mar-198 


4 
Store address of access violation handler into EXESGL_VAXEXCVEC 


when loading decimal/string emulator. 


v03-002 LJK0017 Lawrence J. Kenah __ 17-Jan-1984 
Make table entries for SCB entries position independent. 


(eee 


SLVTAB Sei vivneuee Size of string/decimal ins emulator 


INITRTN=VAXSINIT 7 Address of initialization routine 


F 4 
var. oe = HEADER FOR LOADABLE CHAR/DECIMAL EMULA ym eb 9 O18] 338 AX/VMS Macro V04-00 Page 
v04-000 =SEP=1984 00:44:19 CEMULAT.SRCJLOADHDR.MAR; 1 
: Change PSEC? attributes. 
; v03-001 wMc0001 Wayne Cardoza 23-Jun-1983 
; Fix SLVTAB. 
0 8 H 
0 ; INCLUDE FILES: 
000093 
8 8 SPRIDEF ; Define protection codes 
SPTEDEF :; Define page table entry fields 
8 8 SVADEF ; Define virtual address fields 
8 8 ; This must be the first program section in the image file. 
00000 3 -PSECT $$$S$$BEGIN PAGE ,PIC,USR,CON,REL,GBL,SHR,NOWRT 
4 - ENABLE LOCAL_BLOCK 
8 10$: 
; VAX$BEGIN:: Beginning of string/decimal emulator 
0 
0 
0 
0 
4 
4 
4 
4 


3 3 QOOOCOOOCOSOOSCOCSSSSSSCOSoOOOSCOSOSoSoOOOOCOSOOOOOSoOSoSO 
WRINPININPININININDS 4 2 FOO OOO OO OW 000 SI NINN NIN NNO A AAAOAAO 
= NAME WIN HO OOO NSW ON  ODNAUES SW 0 OONAUESWINOOONAUE wr 


0 

0 

0 

0 

8 

0 SUBTYP=DYNSC_NON_PAGED, - ; Sub=t yee for data structure 

0 PROT_W=PRT$C-URK® , - Protection on loadable code pages 

8 ; FACICITY=VAXEMUL .EXE Name of image loaded 

0 1 

0 110 SCB_UVAX: ; Hook for SCB uVAX except 
000000c8 0 1 -LONG “XC8 : Offset into SCB 
FFFFFEO1* 0028 1 «LONG VAXS$SEMULATE - VAX$BEGIN_UR ; Offset to emulator entry pt 

002C 113 SCB_UVAX_FPD: ; Hook for SCB uVAX FPD except 
000000CcC 002C 1 eLONG “XCC 3; Offset into SCB 
FFFFFEO1" 0030 1 -LONG VAXSEMULATE_FPD - VAX$BEGIN_UR ; Offset to emulator entry pt 
00000000 8 ; ! -LONG 0O : Empty hook ends table 
00000038 8 : ; oseSl Bae & oH 

3 ! ; Insure. at least one page before real code begins 

8 ; 125 SPACE_FILLER1: ; This prevents UR access to 
000001F F 1 LKR <S1l = ...SIZE...? ; the pool fragments on either 

1 2a ; side of the emulation code. 

3 : : - DISABLE LOCAL _BLOCK 

O1FF 151 VAXS$BEGIN_UR:: ; Starting VA to protect UR 


a 
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Functional Description: 


VAXSINIT is Linked together with all of the code required for 

the instruction emulator. The necessary amount of non-paged pool 
is allocated and rounded up to page boundary. Code is then 
moved into this block of pool. ALl of this code must be PIC. 
This code is then re-protected so that it can be executed from 
user mode. A page is allocated on either side of the emulator 

to serve as buffers, because the code is not louded on a page 
boundary and pool cannot be protected UR for security reasons. 


PEGI BE 


The vectors for instruction emulation and instruction emulation 
first-part-done are then connected to the emulation code. 


Calling Sequence: 


| 
JSB VAXSINIT 
Input Parameters: 
| 
| 
| 


None 


Bete Ge Se Se Ge Ge Ge Ge Ge Ge Ge Se Ge Ge Ge Se Se Ge Ge Se Ge Ge Se 


3; This PSECT holds the init routines. 


-PSECT ____INITHK BYTE,PIC,USR,CON,REL,GBL,SHR,NOWRT 
- ENABLE LOCAL_BLOCK 
10$: 
VAXS$INIT:: ; Hook in emulation code 
VAXSEND_UR: : 3; Also ending VA to protect UR 
MOVQ RO,-(SP) ; Save registers 
mMOVQ R2,-(SP) ; Save registers 


Now reset the protection on the non-paged pool to be 
user-read, so that the emulation code can be accessed from 
; all modes. Make it kernel-write so that breakpoints can be 
; set in the emulation code with XDELTA. 


DOOD OOO OOO ODDO DO ad id i i i i i BB a ed a ed ed 


ee we oe ee we we ee ew ee fale lololalololololelolololeleolelolololololololololol ol olal oo) 
——  S- COOOCSOO 


SOON UE W A NA FOOD NAU SWING OF WIN $9 OONOAUE WIN OU FW OM EWI -"OOOGN—OON AO 


ROPOPoPoRoPONoNONONONONN) 2 2 2 2 
Re 2 S$ $9090 00 0000000000909 09 09 INI NII SN NOOO On 


51 OFF'CF 9€ MOVAB W*VAXSBEGIN_UR,R1 ; Get starting VA to protect URKW 
51 51 15 09 EF 00 EXTZV #VASV_VPN,#UASS_VPN,R1.R1 ; Make address into VPN 
26—C OS) 8 0019 ASHL oR1,R1 ; Make into byte index into SPT 
52 FFEB CF QE 0014 MOVAB W*VAXSEND_UR,R2 ; Get ending address to protect URKW 
52 3g 15 09 EF 0 9 EXTZV #VASV_VPN7AVASS_VPN,R2.R2 ; Make address into VPN 
5 52 (02 8 ASHL #2,R ; Make into byte index into SPT 
50 OF QA MOVZBL #PRT$C_URKW,RO ; New protection for emulation code 
53 00000000'GF 9€ 99 3 ae MOVAB  G*MMGSGL_SPTBASE ,R3 ; Get address of system page table 
00 8341 96 1B 28 FO 6 INSV A a PROT,#MPTESS_PROT,a@(R3)CR1] ; Set new 
FFF3 51 04 52 F1 ACBL _—R2,#4,R1,208 : prote tion for each page 
0 INVALID : Invalidate the translation buffer 


| 

| 

| 

| 

0000 
7E 50 7D 
7E 52 «7D 
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: Now connect the emulation code to the system control block. 


MOVL Sac eneen ScB R3 ; Base address of SCB 

MOVAB EMOLATE,*xC8 ; Set SCB to point to emulator code 

MOVAB U-VAKSERULATE euce 5 et SCB to point to emulator code 

MOVAB W*VAX$MO XCEP ; Store address of access violation 
G*EXESGL OM Nencvec 3 handler 


“4 eo 
—x< wD 
OOw 
zow~ 
_ 
‘z= 
ad 
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MOVAB N,- 
GARGS _VAKEMUL BASE ; Store base address of image 
mova (SP)+ ; Restore registers 
mMOVQ (SP)+, R ; Restore registers 
RSB ; and return 
oe INIT_SIZE... = .-108 
- DISABLE LOCAL_BLOCK 
; This must be the Last program section in the image 
S < [ae ae END BYTE,PIC,USR,CON,REL,GBL,SHR,NOWRT 
; Insure at least one page at the-end of the image, too 
SPACE_FILLER2: ; This prevents UR access to 
~—BLKB <511 = ...INIT_SIZE...> ; the pool fragments on either 
; side of the emulation code. 
VAXSEND: : : 
- END 
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..-INIT SIZE... 
eee +. ee 
DYNSC_LOADCODE 
DYNSC “NON, PAGED 


pyaees table sort 


aE, table output 
Psect synopsis output 
Cross-reference output 

Assembler run totals 27 


The working set Limit was 900 pages. 


EXESs sc Rekekene x 
EXESGL—-VAXEXCVEC eeeeeeee xX 03 
MMGS ReRRREEE x | 
MMGSGL~VAXEMUL_BASE aeeeeeee §=6X = =—03 
PRS _TBIA eeeeeeee = =X 8 03 | 
PRTSc JER = 00000007 
PRTSC_URKW = QOO0000E 
PTES$S_PROT = 44 
PTESV- PROT = 00000018 
SCB_UTAK 00000024 R og 
SCB_UVAX_FPD 0000002C R 0 
SPATE _FICLER1 00000038 R 02 
SPACE -FILLER2 4 44 R 04 
VASS_VPN = Boho NG 
VASV_VPN = 00000009 
VAXSBEGIN 00000000 RG 02 
VAXSBEGIN_UR QOOOOTFF RG 02 
VAXSEMULATE eeeeeeee xX 02 
VAXSEMULATE_FPD eeeeenee =X 8 02 
VAXSEND 00000195 RG 04 
VAXSEND_UR 00000000 RG 03 
VAXSINIT 00000000 RG 03 
VAXSRODIFY EXCEPTION eeeeenee KX 03 
own amore nseceanan + 
! Psect synopsis : 
PSECT name Allocation PSECT No. Attributes 
: 00000000 <( 0.) 00 ¢ QO.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS 00000000 ( 0.) 01 1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
oma ® QOOOOIFF ¢ 511.) 8 ( §°} PIC USR CON” REL GBL SHR EXE RD NOWRT NOVEC PAGE 
atid QOO0006A ( 106.) 03 ¢ ~ PIC USR CON REL GBL SHR EXE RD NOWRT NOVEC BYTE 
sna wy 00000195 (¢ 405.) 04 ¢ 4.) PIC USR CON REL GBL SHR’ EXE RD NOWRT NOVEC BYTE 
$ ewer eww encore r seco ecco ceoe 4 
; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
pate Sos tant ten ; 18 00:00:01.56 
n . 
pounen processing 139 Bp 
| 
| 
| 
es 
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16957 bytes (34 pages) of virtual memory were used to buffer ene intermediate 
There were 20 pages of symbol table pace al jeces d to hold 250 non-local ag gr symbols. 
¢ 1 source Lines were read in Pass :, produ ¥ ng 17 object records in Pass 

pages of virtual memory were used to define 11 macros. 


¢ermsceeer ee. see eae ee ese eese eo} 


! Macro Library statistics ! 


ionemeeneee eoaeacoe nannemet 


Macro Library name Macros defined 
3 SDUA SYS.OBJJLIB.MLB;1 5 
$255%0u 38; SYS IBISTAR ARLET.MLB;2 4 
ToTAce t Call oertess 9 


355 GETS were required to define 9 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:VAXLOAD/OBJ=0BJ$:VAXLOAD MSRC$:LOADHDR/UPDATE=(ENH$:LOADHDR) +EXECMLS$/LIB 
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